#using function in perl calcualting area fo circle






$areaOfFirstCircle = areaOfCircle(5);



print("$areaOfFirstCircle\n");

sub areaOfCircle {
    $radius = $_[0];  #This line of code assigns the first element of the @_ array(areaofcircle) to the $radius scalar.
    

return(3.1415 * ($radius ** 2));

}
